/**
  ******************************************************************************
  * <h2><center>&copy; COPYRIGHT 2012 Embest Tech. Co., Ltd.</center></h2>
  * @file    os_cpu_c.c 
  * @author  CMP Team
  * @version V1.0.0
  * @date    28-December-2012
  * @brief   ARM Cortex-M4 Port                        
  ******************************************************************************
  * @attention
  *
  * THE PRESENT FIRMWARE WHICH IS FOR GUIDANCE ONLY AIMS AT PROVIDING CUSTOMERS
  * WITH CODING INFORMATION REGARDING THEIR PRODUCTS IN ORDER FOR THEM TO SAVE
  * TIME. AS A RESULT, Embest SHALL NOT BE HELD LIABLE FOR ANY DIRECT, INDIRECT
  * OR CONSEQUENTIAL DAMAGES WITH RESPECT TO ANY CLAIMS ARISING FROM THE CONTENT
  * OF SUCH FIRMWARE AND/OR THE USE MADE BY CUSTOMERS OF THE CODING INFORMATION
  * CONTAINED HEREIN IN CONNECTION WITH THEIR PRODUCTS.
  ******************************************************************************
  */
/* Includes ------------------------------------------------------------------*/
#define  OS_CPU_GLOBALS
#include <ucos_ii.h>

/* Private variables ---------------------------------------------------------*/

#if OS_TMR_EN > 0
static  INT16U  OSTmrCtr;
#endif


/* Private define ------------------------------------------------------------*/
#define USE_FPU   /* ARMCC */ (  (defined ( __CC_ARM ) && defined ( __TARGET_FPU_VFP )) \
                  /* IAR */   || (defined ( __ICCARM__ ) && defined ( __ARMVFP__ )) \
                  /* GNU */   || (defined ( __GNUC__ ) && defined ( __VFP_FP__ ) && !defined(__SOFTFP__)) )

#define  OS_CPU_CM3_NVIC_ST_CTRL    (*((volatile INT32U *)0xE000E010))   /* SysTick Ctrl & Status Reg. */
#define  OS_CPU_CM3_NVIC_ST_RELOAD  (*((volatile INT32U *)0xE000E014))   /* SysTick Reload  Value Reg. */
#define  OS_CPU_CM3_NVIC_ST_CURRENT (*((volatile INT32U *)0xE000E018))   /* SysTick Current Value Reg. */
#define  OS_CPU_CM3_NVIC_ST_CAL     (*((volatile INT32U *)0xE000E01C))   /* SysTick Cal     Value Reg. */

#define  OS_CPU_CM3_NVIC_ST_CTRL_COUNT                    0x00010000     /* Count flag.                */
#define  OS_CPU_CM3_NVIC_ST_CTRL_CLK_SRC                  0x00000004     /* Clock Source.              */
#define  OS_CPU_CM3_NVIC_ST_CTRL_INTEN                    0x00000002     /* Interrupt enable.          */
#define  OS_CPU_CM3_NVIC_ST_CTRL_ENABLE                   0x00000001     /* Counter mode.              */

/* Private functions ---------------------------------------------------------*/
/**
  * @brief  This function is called by OSInit() at the beginning of OSInit().
  * @param  None
  * @retval None
  */

#if OS_CPU_HOOKS_EN > 0 && OS_VERSION > 203
void  OSInitHookBegin (void)
{
#if OS_TMR_EN > 0
    OSTmrCtr = 0;
#endif
}
#endif

/**
  * @brief  This function is called by OSInit() at the end of OSInit().
  * @param  None
  * @retval None
  */

#if OS_CPU_HOOKS_EN > 0 && OS_VERSION > 203
void  OSInitHookEnd (void)
{
}
#endif

/**
  * @brief  This function is called when a task is created.
  * @param  ptcb is a pointer to the task control block of the task being created.
  * @retval None
  */
#if OS_CPU_HOOKS_EN > 0
void  OSTaskCreateHook (OS_TCB *ptcb)
{
#if OS_APP_HOOKS_EN > 0
    App_TaskCreateHook(ptcb);
#else
    (void)ptcb;                                  /* Prevent compiler warning     */
#endif
}
#endif

/**
  * @brief  This function is called when a task is deleted.
  * @param  ptcb is a pointer to the task control block of the task being deleted.
  * @retval None
  */
#if OS_CPU_HOOKS_EN > 0
void  OSTaskDelHook (OS_TCB *ptcb)
{
#if OS_APP_HOOKS_EN > 0
    App_TaskDelHook(ptcb);
#else
    (void)ptcb;                                  /* Prevent compiler warning    */
#endif
}
#endif

/**
  * @brief  This function is called by the idle task.  This hook has been added to 
  *         allow you to do such things as STOP the CPU to conserve power.
  * @param  None
  * @retval None
  */
#if OS_CPU_HOOKS_EN > 0 && OS_VERSION >= 251
void  OSTaskIdleHook (void)
{
#if OS_APP_HOOKS_EN > 0
    App_TaskIdleHook();
#endif
}
#endif

/**
  * @brief  This function is called every second by uC/OS-II's statistics task.  
  *         This allows your application to add functionality to the statistics task.
  * @param  None
  * @retval None
  */
#if OS_CPU_HOOKS_EN > 0
void  OSTaskStatHook (void)
{
#if OS_APP_HOOKS_EN > 0
    App_TaskStatHook();
#endif
}
#endif


/**
  * @brief  This function is called if a task accidentally returns.  In other words, 
  *         a task should either be an infinite loop or delete itself when done.
  * @param  p_tcb  Pointer to the task control block of the task that is returning.
  * @retval None
  */
void  OSTaskReturnHook (OS_TCB  *p_tcb)
{
#if OS_APP_HOOKS_EN > 0u
    App_TaskReturnHook(p_tcb);
#else
    (void)p_tcb;                                            /* Prevent compiler warning*/
#endif
}

/**
  * @brief  This function is called by either OSTaskCreate() or OSTaskCreateExt() 
  *         to initialize the stack frame of the task being created.  This function 
  *         is highly processor specific.
  * @param  task  is a pointer to the task code
  *         p_arg is a pointer to a user supplied data area that will be passed to 
  *               the task when the task first executes.
  *         ptos  is a pointer to the top of stack.  It is assumed that 'ptos' points to
  *               a 'free' entry on the task stack.  If OS_STK_GROWTH is set to 1 then
  *               'ptos' will contain the HIGHEST valid address of the stack.  Similarly, if
  *               OS_STK_GROWTH is set to 0, the 'ptos' will contains the LOWEST valid address
  *               of the stack.
  *         opt   specifies options that can be used to alter the behavior of OSTaskStkInit().
  *              (see uCOS_II.H for OS_TASK_OPT_xxx).
  * @retval Always returns the location of the new top-of-stack once the processor registers 
  *         have been placed on the stack in the proper order.
  */
OS_STK *OSTaskStkInit (void (*task)(void *p_arg), void *p_arg, OS_STK *ptos, INT16U opt)
{
    OS_STK *stk;
#if USE_FPU
    int i;
#endif
    (void)opt;                                   /* 'opt' is not used, prevent warning */
    stk       = ptos;                            /* Load stack pointer                 */
#if USE_FPU   
    if ((opt & OS_TASK_OPT_SAVE_FP) != 0){
        *(stk) = (INT32U)0xCCUL;
        *(--stk) = (INT32U)0xDDUL;

        for(i = 0; i < 16; i++) {
          *(--stk) = (INT32U)0xAAAAAAAAUL;
        }
    } 
#else
    ++stk;
#endif
                                                 /* Registers stacked as if auto-saved on exception    */
    *(--stk)  = (INT32U)0x01000000L;             /* xPSR                                               */
    *(--stk)  = (INT32U)task;                    /* Entry Point                                        */
    *(--stk)  = (INT32U)0xFFFFFFFEL;             /* R14 (LR) (init value will cause fault if ever used)*/
    *(--stk)  = (INT32U)0x12121212L;             /* R12                                                */
    *(--stk)  = (INT32U)0x03030303L;             /* R3                                                 */
    *(--stk)  = (INT32U)0x02020202L;             /* R2                                                 */
    *(--stk)  = (INT32U)0x01010101L;             /* R1                                                 */
    *(--stk)  = (INT32U)p_arg;                   /* R0 : argument                                      */

                                                 /* Remaining registers saved on process stack         */
    *(--stk)  = (INT32U)0x11111111L;             /* R11                                                */
    *(--stk)  = (INT32U)0x10101010L;             /* R10                                                */
    *(--stk)  = (INT32U)0x09090909L;             /* R9                                                 */
    *(--stk)  = (INT32U)0x08080808L;             /* R8                                                 */
    *(--stk)  = (INT32U)0x07070707L;             /* R7                                                 */
    *(--stk)  = (INT32U)0x06060606L;             /* R6                                                 */
    *(--stk)  = (INT32U)0x05050505L;             /* R5                                                 */
    *(--stk)  = (INT32U)0x04040404L;             /* R4                                                 */

#if USE_FPU    
    if ((opt & OS_TASK_OPT_SAVE_FP) != 0){
        for (i = 0u; i < 16; i++) {                  /* Initialize general-purpose Floating point registers */
          *--stk = (INT32U)0xBBBBBBBBuL;             /* S16-S31                                             */
        }
    }
#endif
    return (stk);
}

/**
  * @brief  This function is called when a task switch is performed.  This 
  *         allows you to perform other operations during a context switch.
  * @param  None
  * @retval None
  */
#if (OS_CPU_HOOKS_EN > 0) && (OS_TASK_SW_HOOK_EN > 0)
void  OSTaskSwHook (void)
{
#if OS_APP_HOOKS_EN > 0
    App_TaskSwHook();
#endif
}
#endif

/**
  * @brief  This function is called by OS_TCBInit() after setting up most of the TCB.
  * @param  ptcb    is a pointer to the TCB of the task being created.
  * @retval None
  */
#if OS_CPU_HOOKS_EN > 0 && OS_VERSION > 203
void  OSTCBInitHook (OS_TCB *ptcb)
{
#if OS_APP_HOOKS_EN > 0
    App_TCBInitHook(ptcb);
#else
    (void)ptcb;                                  /* Prevent compiler warning                           */
#endif
}
#endif

/**
  * @brief  This function is called every tick.
  * @param  None
  * @retval None
  */
#if (OS_CPU_HOOKS_EN > 0) && (OS_TIME_TICK_HOOK_EN > 0)
void  OSTimeTickHook (void)
{
#if OS_APP_HOOKS_EN > 0
    App_TimeTickHook();
#endif

#if OS_TMR_EN > 0
    OSTmrCtr++;
    if (OSTmrCtr >= (OS_TICKS_PER_SEC / OS_TMR_CFG_TICKS_PER_SEC)) {
        OSTmrCtr = 0;
        OSTmrSignal();
    }
#endif
}
#endif

/**
  * @brief  Handle the system tick (SysTick) interrupt, which is used 
  *         to generate the uC/OS-II tick interrupt.
  * @param  None
  * @retval None
  */

void  OS_CPU_SysTickHandler (void)
{
    OS_CPU_SR  cpu_sr;


    OS_ENTER_CRITICAL();                         /* Tell uC/OS-II that we are starting an ISR          */
    OSIntNesting++;
    OS_EXIT_CRITICAL();

    OSTimeTick();                                /* Call uC/OS-II's OSTimeTick()                       */

    OSIntExit();                                 /* Tell uC/OS-II that we are leaving the ISR          */
}

/**
  * @brief  Initialize the SysTick.
  * @param  None
  * @retval None
  */

void  OS_CPU_SysTickInit (void)
{
    INT32U  cnts;


    cnts = OS_CPU_SysTickClkFreq() / OS_TICKS_PER_SEC;

    OS_CPU_CM3_NVIC_ST_RELOAD = (cnts - 1);
                                                 /* Enable timer.                                      */
    OS_CPU_CM3_NVIC_ST_CTRL  |= OS_CPU_CM3_NVIC_ST_CTRL_CLK_SRC | OS_CPU_CM3_NVIC_ST_CTRL_ENABLE;
                                                 /* Enable timer interrupt.                            */
    OS_CPU_CM3_NVIC_ST_CTRL  |= OS_CPU_CM3_NVIC_ST_CTRL_INTEN;
}

/******************** COPYRIGHT 2012 Embest Tech. Co., Ltd.*****END OF FILE****/
